home *** CD-ROM | disk | FTP | other *** search
/ Developer CD Series 2000 November: Tool Chest / Dev.CD Nov 00 TC Disk 2.toast / pc / sample code / printing / std file saver / source / mypack_4096_nothing.a < prev    next >
Encoding:
Text File  |  2000-09-28  |  1.5 KB  |  55 lines
  1. ;
  2. ; Copyright 1991-1996 Apple Computer. All rights reserved.
  3. ;
  4. ;    You may incorporate this sample code into your applications without
  5. ;    restriction, though the sample code has been provided "AS IS" and the
  6. ;    responsibility for its operation is 100% yours.  However, what you are
  7. ;    not permitted to do is to redistribute the source as "DSC Sample Code"
  8. ;    after having made changes. If you're going to re-distribute the source,
  9. ;    we require that you make it clear in the source that the code was
  10. ;    descended from Apple Sample Code, but that you've made changes.
  11. ;
  12.  
  13.  IF &TYPE('__INCLUDINGTRAPS__') = 'UNDEFINED' THEN
  14.  INCLUDE 'Traps.a'
  15.  ENDIF
  16.  
  17. MYPACK    PROC    EXPORT
  18.     IMPORT    CHOOSERMAIN
  19.  
  20.     BRA.S    @1
  21.     DC.W    $5346    ; 'SF' - device ID
  22.     DC.L    $5041434B    ; this means PACK - don't change
  23.     DC.W    $F000    ; -4096 - don't change this
  24.     DC.W    $0201    ; version 2.1
  25.     DC.L    $0C13F800    ; flags - see below
  26. ;
  27. ; Description of flags word
  28. ;
  29. ; Bit    hex    meaning
  30. ; ---           ---    -------
  31. ; 31    $80000000    IsAppleTalkDevice
  32. ; 30-29    n/a    reserved (always 0)
  33. ; 28    $10000000    PACK is reentrant
  34. ; 27    $08000000    usesLeftButton
  35. ; 26    $04000000    usesRightButton
  36. ; 25    $02000000    noSavedZoneName
  37. ; 24    $01000000    usesZoneNames
  38. ; 23-21    n/a    reserved (always 0)
  39. ; 20    $00100000    usesRadioButtons (and label)
  40. ; 19-18    n/a    reserved (always 0)
  41. ; 17    $00020000    acceptsChooserInitMsg
  42. ; 16    $00010000    acceptsNewSelMsg
  43. ; 15    $00008000    acceptsFillListMsg
  44. ; 14    $00004000    acceptsGetSelMsg
  45. ; 13    $00002000    acceptsSelectMsg
  46. ; 12    $00001000    acceptsDeselectMsg
  47. ; 11    $00000800    acceptsTerminateMsg
  48. ; 10-0    n/a    reserved (always 0)
  49. ;
  50. @1    
  51.     JMP    CHOOSERMAIN
  52.  
  53.     ENDPROC
  54.     END
  55.